scompress[source-op, dest-op]
scompress[source-op, dest-op, "str"]
scompress[source-op, dest-op, "str", min-ngram-len, max-ngram-len]
reads in all the patterns that are defined with respect to 'source-op'
then breaks those patterns into smaller and smaller ngrams
counting the frequency of those ngrams
for a given ngram size, the first, most common, ngram is then promoted to its own pattern
repeat, until ngram size is 1
then save all the new patterns with respect to the 'dest-op' operator
If "str" is given, use that instead of "scompress: ".